-module (test1).
-export ([area/1]).

area({yuan,W,H}) -> W*H.